home *** CD-ROM | disk | FTP | other *** search
/ Network Supervisor's Toolkit / Network Supervisor's Toolkit.iso / logins / fslogin / install.bat < prev    next >
DOS Batch File  |  1996-07-10  |  6KB  |  146 lines
  1.     @echo off
  2.     cls
  3. echo\
  4. echo            ╒══════════════════════════════════════════════════════════════╕
  5. echo            │ INSTALL.BAT                                     FSLOGIN 1.50 │
  6. echo            │                                                              │
  7. echo            │ This batch file installs Full Screen Login on a server.      │
  8. echo            │                                                              │
  9. echo            │ Please be sure that you have SUPERVISOR or EQUIVALENT rights │
  10. echo            │ because files must be copied to the SYS:LOGIN and the SYS:   │
  11. echo            │ PUBLIC directories.                                          │
  12. echo            │                                                              │
  13. echo            │ Continue?  'Y'es or 'N'o.                                    │
  14. echo            ╘══════════════════════════════════════════════════════════════╛
  15. echo\
  16.     yesno
  17.     if errorlevel 1 goto check_source
  18.     goto end
  19. ::
  20. :check_source
  21. ::
  22.     if exist install.bat goto check_target
  23.     cls
  24. echo\
  25. echo            ╒══════════════════════════════════════════════════════════════╕
  26. echo            │ HELP_1                                                  1.50 │
  27. echo            │                                                              │
  28. echo            │ This batch file should be run from the same drive and        │
  29. echo            │ directory, where the other files of the FSLOGIN package      │
  30. echo            │ reside.                                                      │
  31. echo            │ Please change the current drive and directory first.         │
  32. echo            │                                                              │
  33. echo            ╘══════════════════════════════════════════════════════════════╛
  34. echo\
  35.     pause
  36.     goto end
  37. ::
  38. :check_target
  39. ::
  40.     if NOT exist sys:login\fslogin.* goto select
  41.     cls
  42. echo\
  43. echo            ╒══════════════════════════════════════════════════════════════╕
  44. echo            │ HELP_2                                                  1.50 │
  45. echo            │                                                              │
  46. echo            │ Full Screen Login is already installed on this server.       │
  47. echo            │ Do you want to write over the currently installed version?   │
  48. echo            │                                                              │
  49. echo            │ Continue?  'Y'es or 'N'o.                                    │
  50. echo            ╘══════════════════════════════════════════════════════════════╛
  51. echo\
  52.     yesno
  53.     if errorlevel 1 goto write_over
  54.     goto end
  55. ::
  56. :write_over
  57. ::
  58.     flag  sys:login\fslogin.* rw
  59.     flag  sys:public\fslogin.com rw
  60. ::
  61. :select
  62. ::
  63.     cls
  64. echo\
  65. echo            ╒══════════════════════════════════════════════════════════════╕
  66. echo            │ HELP_3                                                  1.50 │
  67. echo            │                                                              │
  68. echo            │ Full Screen Login has support for multiple languages. Please │
  69. echo            │ select one of them with a function key.                      │
  70. echo            │                                                              │
  71. echo            │ F1  -  English                                               │
  72. echo            │ F2  -  Dutch                                                 │
  73. echo            │ F3  -  German                                                │
  74. echo            │ F4  -  French                                                │
  75. echo            │                                                              │
  76. echo            │ F10 -  Quit installation                                     │
  77. echo            │                                                              │
  78. echo            ╘══════════════════════════════════════════════════════════════╛
  79. echo\
  80.     fk 1234A
  81.     if errorlevel 10 goto end
  82.     if errorlevel 4  goto french
  83.     if errorlevel 3  goto german
  84.     if errorlevel 2  goto dutch
  85.     if errorlevel 1  goto english
  86.     goto end
  87. ::
  88. :english
  89. ::
  90.     cls
  91.     copy  US.* fslogin.*
  92.     goto generic
  93. ::
  94. :dutch
  95. ::
  96.     cls
  97.     copy  NL.* fslogin.*
  98.     goto generic
  99. ::
  100. :german
  101. ::
  102.     cls
  103.     copy  DE.* fslogin.*
  104.     goto generic
  105. ::
  106. :french
  107. ::
  108.     cls
  109.     copy  FR.* fslogin.*
  110.     goto generic
  111. ::
  112. :generic
  113. ::
  114.     ncopy fslogin.*   sys:login
  115.     ncopy fslogin.com sys:public
  116.     flag  sys:login\fslogin.* ro s
  117.     flag  sys:login\fslogin.ini rw s
  118.     flag  sys:public\fslogin.com ro s
  119.     pause
  120.     cls
  121. echo\
  122. echo            ╒══════════════════════════════════════════════════════════════╕
  123. echo            │ HELP_4                                                  1.50 │
  124. echo            │                                                              │
  125. echo            │ When there are no error messages from the ncopy and flag     │
  126. echo            │ commands, Full Screen Login has been installed.              │
  127. echo            │                                                              │
  128. echo            │ Just type FSLOGIN at the dos prompt to use this program, or  │
  129. echo            │ refer to the documentation for further instructions.         │
  130. echo            │                                                              │
  131. echo            │                     ┌─────────┐                              │
  132. echo            │               ┌─────┴───┐     │              (R)             │
  133. echo            │             ──│         │o    │──────────────────            │
  134. echo            │               │   ┌─────┴╨──┐ │  Association of              │
  135. echo            │               │   │         │─┘  Shareware                   │
  136. echo            │               └───│    o    │    Professionals               │
  137. echo            │             ──────│    ║    │────────────────────            │
  138. echo            │                   └────╨────┘    MEMBER                      │
  139. echo            ╘══════════════════════════════════════════════════════════════╛
  140. echo\
  141.     pause
  142.     goto end
  143. ::
  144. :end
  145. ::
  146.